home *** CD-ROM | disk | FTP | other *** search
/ Paparazzi!: Tales of Tinseltown / Paparazzi - Tales of Tinseltown (1995)(Activision)(Disc 1 of 2).iso / pprazia1.dir / 01128_Script_AskForCD ResumeBtn < prev    next >
Text File  |  1995-05-21  |  1KB  |  39 lines
  1. on mouseDown
  2.   put "ResumeBTN" into f
  3.   put "ResumeBTNHL" into fHL
  4.   hiliter 3, f, fHL
  5.   puppetsound "hey.aif"
  6.   updatestage
  7. end
  8.  
  9.  
  10.  
  11. on mouseUp
  12.   global gDayOfTheWeek, gTheDay,ThePapMovie1, ThePapMovie2
  13.   
  14.   set the castNum of sprite 3 = cast "ResumeBTN"
  15.   updatestage
  16.   
  17.   put getNthFileNameInFolder("PPrazzi1:Assets", 1) into CD1
  18.   put getNthFileNameInFolder("PPrazzi2:Assets", 2) into CD2
  19.   
  20.   if gDayOfTheWeek <= 8 and not (CD1 = "") then -- the first CD is in
  21.     go frame gTheDay & "trans" of movie the pathName & "PPraziA1"
  22.   else
  23.     go frame "CD1TryAgain"
  24.   end if
  25.   
  26.   if gDayOfTheWeek >= 9 and not (CD2 = "") then -- the second CD is in
  27.     go frame gTheDay & "trans" of movie the pathName & "PPraziA2"
  28.   else
  29.     go frame "CD2TryAgain"
  30.   end if
  31.   
  32.   if CD1 = "" and CD2 = "" then -- no CD is in
  33.     if gDayOfTheWeek <= 8 then
  34.       go frame "NoCD1"-- see which disk they need and ask for it
  35.     else
  36.       go frame "NoCD2"-- see which disk they need and ask for it
  37.     end if
  38.   end if
  39. end